| PROGRAMOWANIE |  Kurs Delphi cz.VI   

Tym razem zajmiemy siΩ jeszcze jedn▒ opcj▒ w programie "K≤│ko i Krzy┐yk". Dodamy opcje wpisywania imion. W ko±cu g│upio jest jak na przyciskach widnieje napis "Gracz 1", "Gracz 2".

Zr≤b tak:

  1. Umie╢µ na formularzu dwa komponenty Edit i przycisk

  2. Tre╢µ procedury:

procedure TMain1stGame.Button11Click(Sender: TObject);
begin
speedb.caption:=edit1.text;
speedb2.caption:=edit2.text;
end;

Prawda, ┐e proste? Przyda│aby siΩ jaka╢ pomoc tj. Pomoc na pasku stanu. Je┐eli umie╢ci│e╢ na formularzu komponent StatusBar zr≤b co╢ takiego.

  1. Zmie± jego w│a╢ciwo╢µ AutoHint na True. 

  2. Zaznacz wszystkie przyciski (opr≤cz przycisku: "Nowa tura", "Gracz 1", "Gracz 2" i  wpisz w Inspektorze Obiekt≤w w pole Hint np. co╢ takiego:

Kliknij na± | Kliknij przycisk, aby postawiµ k≤│ko lub krzy┐yk.

Zauwa┐, ┐e oba zdania oddziela znak "|" - Pipeline. To co jest przed tym znakiem pojawiaµ siΩ bΩdzie gdy kto╢ najedzie mysz▒ na przycisk, a drugi cz│on pojawiaµ siΩ bΩdzie na pasku zada±. To ju┐ chyba wszystko je╢li chodzi o program K≤│ko i Krzy┐yk. Kod ╝r≤d│owy tego programu mo┐esz znale╝µ na mojej stronie: www.programowanie.of.pl Je┐eli unowocze╢nili╢cie ten program to przy╢lijcie mi jego kod ╝r≤d│owy, a nowa wersja bΩdzie umieszczona na stronie.
M≤j adres: programowanie@poczta.onet.pl 

Nie napisa│em nic o kodach ╝r≤d│owych. Je┐eli chcesz przenie╢µ na komputer kolegi kod ╝r≤d│owy wystarcz▒ pliki z rozszerzeniem *.pas, *.dpr, *.dfm. Pozosta│e kompilator odbuduje podczas kompilacji.

Teraz nale┐a│oby wspomnieµ co╢ o innych funkcjach Delphi. Istniej▒ tzw. wyj▒tki. DziΩki temu zawsze mo┐esz poinformowaµ o b│Ωdzie np.

try
//
kod programu

except

//wyj▒tek

Obja╢nienie: S│owo try (od ang. Spr≤buj) oznacza akcje po kt≤rej nast▒pi wykonanie funkcji kt≤ra jest pod s│owem try 
Po s│owie except nastΩpuje kod wyj▒tku. Istnieje tak┐e s│owo finally kt≤re wstawia siΩ zamiast s│owie except. Po nim mo┐na umie╢ciµ funkcje kt≤ra zostanie wykonana niezale┐nie od tego czy nast▒pi│ wyj▒tek.

Przydatn▒ funkcj▒ jest funkcja losowania. 

x:=10;
randomize;
edit1.text:=inttostr(random(x));

W oknie Edit nastΩpi wylosowanie liczb z zakresu od 1 do 9. ProcedurΩ losuj▒c▒ oznacza siΩ s│≤wkiem random.

CzΩsto zachodzi potrzeba wy╢wietlenia drugiego okna. W tym celu nale┐y z menu File wybraµ New Form i zapisaµ j▒. P≤╝niej w procedurze np. Button1 napisaµ:

Form2.showmodal;

w przypadku gdy drugie okno jest nazwane Form2. S│≤wko showmodal oznacza, okno modalne tj. takie, kt≤re bΩdzie mo┐na modelowaµ, czy zmieniaµ po│o┐enie. W przeciwnym wypadku wystarczy tylko s│≤wko show.

 

Autor:
Adam Boduch
boduch@poland.com

Kurs udostΩpni│ :
http://www.programowanie.of.pl



                    
ARCHIWALIA | WEBHELP.PL | REDAKCJA                  POPRZEDNIA STRONA | SPIS TREªCI | NAST╩PNA STRONA

CONTENTS COPYRIGHT © 2000 - 2001, KRZYSZTOF DZIEWO╤SKI. ALL RIGHTS RESERVED.